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FIG. 19 

906 



values { 

deltaT = tc(th) - tc(tl) 

Pout = F_s*deltaT*E_s*w_s*t_s*t_ 

(4 * 1 s) * 4.24358 

} 

equations { 

I no input heat flow 

p(th->tl) += 0 

f output force 
* frc N (posl->pos2) += Pout 
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